﻿Public Class Producto
    Public Sub New()
        _producto = New Collection
    End Sub

    Private _idProducto As Integer
    Public Property idProducto() As Integer
        Get
            Return _idProducto
        End Get
        Set(ByVal value As Integer)
            _idProducto = value
        End Set
    End Property

    Private _nombre As String
    Public Property nombre() As String
        Get
            Return _nombre
        End Get
        Set(ByVal value As String)
            _nombre = value
        End Set
    End Property

    Private _stock As Integer
    Public Property stock() As Integer
        Get
            Return _stock
        End Get
        Set(ByVal value As Integer)
            _stock = value
        End Set
    End Property

    Private _precio As Integer
    Public Property precio() As Integer
        Get
            Return _precio
        End Get
        Set(ByVal value As Integer)
            _precio = value
        End Set
    End Property
    Private _disponibilidad As String
    Public Property disponibilidad() As String
        Get
            Return _disponibilidad
        End Get
        Set(ByVal value As String)
            _disponibilidad = value
        End Set
    End Property
    Private _producto As Collection
    Public Property producto() As Collection
        Get
            Return _producto
        End Get
        Set(ByVal value As Collection)
            _producto = value
        End Set
    End Property

    Public Sub agregarProducto(ByVal p As Producto)
        _producto.Add(p)
    End Sub
End Class
